From: Dmitry Gutov <dmitry@gutov.dev>
Date: Sun, 2 Mar 2025 03:13:14 +0000 (+0200)
Subject: completing-read-multiple: Fix support for ":" as separator
X-Git-Tag: archive/raspbian/1%30.2+1-2+rpi1^2~2^2~24^2~241
X-Git-Url: https://dgit.raspbian.org/%22http://www.example.com/cgi/success/%22http:/www.example.com/cgi/success?a=commitdiff_plain;h=8091772767666f2c671a8ba481d50859388152db;p=emacs.git

completing-read-multiple: Fix support for ":" as separator

* lisp/emacs-lisp/crm.el (completing-read-multiple):
Do not search for separators inside the prompt (bug#76461).
---

diff --git a/lisp/emacs-lisp/crm.el b/lisp/emacs-lisp/crm.el
index a371a8e14de..d442d74f030 100644
--- a/lisp/emacs-lisp/crm.el
+++ b/lisp/emacs-lisp/crm.el
@@ -253,7 +253,9 @@ with empty strings removed."
           (setq-local completion-list-insert-choice-function
                       (lambda (_start _end choice)
                         (let* ((beg (save-excursion
-                                      (if (search-backward-regexp crm-separator nil t)
+                                      (if (search-backward-regexp crm-separator
+                                                                  (field-beginning)
+                                                                  t)
                                           (1+ (point))
                                         (minibuffer-prompt-end))))
                                (end (save-excursion